﻿Public Class DocumentoAlmacenPickeadorTiempo

    Dim _DAPT_Codigo As String
    Dim _CIA, _SUC, _ALM, _TDOC As String
    Dim _CODDCA, _PICKCOD As String
    Dim _EVECOD As String
    Dim _DAPCOD As Integer
    Dim _FECINI As String, _FECFIN As String
    Dim _ACT As String

    Sub New()

    End Sub

    Sub New(ByVal dadt As String, ByVal cia As String, ByVal suc As String, ByVal tdo As String, ByVal dca As String, ByVal dap As String, ByVal alm As String, ByVal pick As String, ByVal eve As String, ByVal fechaIni As String, ByVal fechaFin As String, ByVal activo As String)
        Me._DAPT_Codigo = dadt
        Me._CIA = cia
        Me._SUC = suc
        Me._TDOC = tdo
        Me._CODDCA = dca
        Me._DAPCOD = dap
        Me._ALM = alm
        Me._PICKCOD = pick
        Me._EVECOD = eve
        Me._FECINI = fechaIni
        Me._FECFIN = fechaFin
        Me._ACT = activo
    End Sub

    Public Property DAPT_Codigo() As String
        Get
            Return _DAPT_Codigo
        End Get
        Set(ByVal value As String)
            _DAPT_Codigo = value
        End Set
    End Property

    Public Property CIA() As String
        Get
            Return _CIA
        End Get
        Set(ByVal value As String)
            _CIA = value
        End Set
    End Property

    Public Property SUC_Codigo() As String
        Get
            Return _SUC
        End Get
        Set(ByVal value As String)
            _SUC = value
        End Set
    End Property

    Public Property ALM_Codigo() As String
        Get
            Return _ALM
        End Get
        Set(ByVal value As String)
            _ALM = value
        End Set
    End Property

    Public Property TDOC_Codigo() As String
        Get
            Return _TDOC
        End Get
        Set(ByVal value As String)
            _TDOC = value
        End Set
    End Property

    Public Property DAP_Codigo() As Integer
        Get
            Return _DAPCOD
        End Get
        Set(ByVal value As Integer)
            _DAPCOD = value
        End Set
    End Property

    Public Property DCA_Codigo() As String
        Get
            Return _CODDCA
        End Get
        Set(ByVal value As String)
            _CODDCA = value
        End Set
    End Property

    Public Property PICK_Codigo() As String
        Get
            Return _PICKCOD
        End Get
        Set(ByVal value As String)
            _PICKCOD = value
        End Set
    End Property

    Public Property EVE_Codigo() As String
        Get
            Return _EVECOD
        End Get
        Set(ByVal value As String)
            _EVECOD = value
        End Set
    End Property

    Public Property DAPT_FechaIni() As String
        Get
            Return _FECINI
        End Get
        Set(ByVal value As String)
            _FECINI = value
        End Set
    End Property

    Public Property DAPT_FechaFin() As String
        Get
            Return _FECFIN
        End Get
        Set(ByVal value As String)
            _FECFIN = value
        End Set
    End Property

    Public Property DAPT_Activo() As String
        Get
            Return _ACT
        End Get
        Set(ByVal value As String)
            _ACT = value
        End Set
    End Property

End Class
